<?
$Archivo = 'Visitas.txt';
$IP = $_SERVER["REMOTE_ADDR"];
$Time = date("d/m/y h:i");

$Abrir = fopen($Archivo,"r"); //Abro el archivo con el apuntador en 0
$Cont_Arch = fread($Abrir,filesize($Archivo)); //Leo todo el archivo y lo almaceno en esta var
$inicio_ultima_entrada = strrpos($Cont_Arch,">"); //Busco donde comienza la ultima entrada realizada
$final_ultima_entrada = strrpos($Cont_Arch,"<"); //Busco donde termina la ultima entrada realizada
$tama_ultima_entrada = $final_ultima_entrada-$inicio_ultima_entrada; //Obtengo La Longitud de la Ultima Cadena
$Ult_Ent = substr($Cont_Arch,$inicio_ultima_entrada,$tama_ultima_entrada); //Obtengo la ultima entrada
$Ult_Ent = explode("|",$Ult_Ent); //Primer Paso Para Obtener el numero de Visitantes
$Visitante = $Ult_Ent[1];

if($Ult_Ent[2]!=$IP){
	$Visitante++;
	$Escribir = ">|$Visitante|$IP|$Time|<\n";
	if(is_writable($Archivo)){
		if(!$gestor = fopen($Archivo, 'a'))
			exit;
		if(fwrite($gestor,$Escribir)===FALSE)
			exit;
		fclose($gestor);
	}
}
echo "$Visitante";
?>